* Дуги, хорды, сектора. присвоить синий 13 присвоить $ТолщинаЛинии 3 $ЦветЛинии [синий] рисовать присвоить 10 30 рисовать дуга 0 0 200 200 200 0 0 0 рисовать текстВПрямоугольнике 0 0 200 100 дуга рисовать присвоить 220 30 рисовать хорда 0 0 200 200 200 0 0 0 рисовать текстВПрямоугольнике 0 0 200 100 хорда рисовать присвоить 430 30 рисовать сектор 0 0 200 200 200 0 0 0 рисовать текстВПрямоугольнике 0 0 200 100 сектор